home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Languages / PowerMacOberon 1.2 / System / MarkElems.Obj < prev    next >
Encoding:
Text File  |  1995-08-14  |  5.4 KB  |  13 lines  |  [TEXT/.Ob4]
  1. ¯6˚
  2. ˇÃ$0à63TîMarkElemsǡ ·Ø‚º∏8ÉAlloc MarkProcs‚InsertØShowNext∏Update8Ñ ,Ö6e∏uFiles;‚WêFonts;‚ÜDisplay;‚WêInput;ı‰ƒViewers2ˆßæTexts2¯"TextFrames2¯fl<TextPrinter;˜ê
  3. MenuViewers2ˆÊÃOberonÜˇÛˇÈˇ‰ˇˇ¸◊
  4. ˇ◊
  5. ˇ—ˇ     ˇ¬ ˇ¶ˇô
  6. ¸k¸ˇ¸ˇ\ ˇ.ˇ˛˙˛Í˛W˛
  7. ˛n˛/
  8. ˝Ë
  9.  
  10. ˛¸è¸â¸d˝d    ˝^
  11. ¸˜¸Á¸”¸X¸C
  12. ¸    ˚˜áPROCEDUREAllocMarkElemsSystem.Close  MarkElems.Update MarkElemà|¶øaˇÏêî!ˇ†;·8êA;√;†;Ä;`8bˇ»8ÄÄBˇËHÄA;£8bÄǡ‰ÄÑˇ– ûÄæ(8¿ÄBˇ‰HÄA8}ÄÇÄBˇ‰HÄAÄbˇ¯ÄBˇÃHÄA;c õì€|8{8ù8†ÄBˇËHÄA8`8ü 8øÄBˇÙHÄA8bˇº8Ä    8¢ˇú8¿ ÄBˇËHÄA8õÄ¢ˇË®•®fl ®ˇÄBˇHÄA;ÉÄ0Ä!|¶ªaˇÏO‡ |¶øAˇËêî!ˇ†;·8êA;√;§;@» ûÉû8~ û û®fi®˛ |Ü: û®æ
  13. ÄBˇËHÄA;c|úËA ÿA¯ /ö@˛C‡ 8~|öËÄBˇËHÄAZpC‡ˇîÄ0Ä!|¶ªAˇËO‡ |¶ø¡ˇ¯êî!ˇê;·8êA8ê êê êÅ,àAÊ¥8Å"ˇ‰ÄâˇÿÄ¢ ÖÄ•8¿ÄBˇ‰HÄA8ÅBˇ‰ÄäˇÿÄBˇ‰HÄAâ/ A˙C‡dÅü Äbå@˛P8Äǡ‰ÄÑˇÿÄBˇ‰HÄA;√Äb8ûKˇ˛ùÄb0ûˇˇ8æÄBˇËHÄA8†ê¢C‡C‡ˇ|Ä@Ä!|¶ª¡ˇ¯O‡ |¶øaˇÏêî!ˇ®;·8êA;√;§;Ö;f8ê,û@Ê,/@˙8¿∞€C‡ ú®¸&}–±C‡XÅ>ˇ¸ÅBˇËÅjˇËÅâˇÙlX ûÄ~8ù8ø8flÄBˇËHÄAÄ ÉÄÉ<8†'|ƒ*◊@‡0Δˇˇ∞€Ä(Ä!|¶ªaˇÏO‡ |¶øaˇÏêî!ˇ†;·8êA;√;Ñ;•;`IJˇ¸Åˇ¸Å'ˇi@ÅBˇ‰Åjˇ‡ÅùˇÙåX@˛X®|,É@Ê(8|Äǡ–ÄÑˇÙ û8æ(ÄBˇ–HÄAC‡$8|Ä¢ˇ–ÄÖˇÙ ûÄæ(ÄBˇ–HÄAC‡ºÄ¬ˇ‰ÄÊˇ‰ÅˇÙ8@˙DÄbˇ¸ÄBˇÃKˇˇÅÄA;c8~8õÄBˇ‰HÄA õ ûÅ>(ë;(ì|C‡hÅBˇ‰Åjˇ‹ÅùˇÙåX@˛@8‹ˇ¸8‚ˇêÄgÄáêfêÜ8Á8Δ |g™|f™9| 9ǡà} 4™} 5™C‡ÄbˇËÄɡ¸ÄΩˇÙ|Ö @ÊTà‹ Ê/A˙@Ä| Äúĺ8flKˇ˝¡8`ÄÇ®º©©?|»J8‡ÄBˇÿHÄAC‡¥ÅBˇÏÅjˇ¸ÅùˇÙåX@˛4à|,ÉAÊ û8ÄêûC‡ û<†8≈‘¿êfiC‡pÄ‚ˇËÅˇ‹Å=ˇÙ    @@˙\Å\UKA‚PÄ|Äúĺ8flKˇ˝8`ÄÇ®º©ú®fl|Ã28‡ÄBˇÿKˇ˙·ÄA8`ÄÇ ®º®¸©|«B8‡ÄBˇÿKˇ˙=ÄA8 8ü8øÄBˇ‹HÄAÅ<Å_ }+Sxë|ÅǡÙ8l,ÄǡÙÄÑˇËÄ¢ˇÙ8• ĬˇÙÄΔˇÏ®ˇ©ÄBˇÙHÄAġ /á@˛ˇú8`ÄÇ ®º©©?|»J8‡ÄBˇÿKˇ˙ÄA8`ÄÇ®º©\©| Z8‡ÄBˇÿKˇ˘ÖÄAÅú<`@|å@Ê Kˇ˚C‡Äú<†¿(@˙ 8~Kˇ˘)Ä0Ä!|¶ªaˇÏO‡ |¶ø¡ˇ¯êî!ˇ∏;·8êA;¿Äbˇ¸ÄBˇÃKˇ˚¡ÄA;√ û<¿8Ê‘¿ê˛ û=9(≠∞ë> û=@9jë~ê^  ûÄBˇÙHÄAê~(8~C‡‡ÄÄ!|¶ª¡ˇ¯O‡ |¶øAˇËêî!˛H;·8êA;¿;†;@ì_(ì_ì_ì_ ÄBˇÙHÄA;√ ûÅû åÄlÄɡ¸Ä¢ˇËÄ≈ˇËĉˇÙá0@˛‹ ûÉæ ùÅÅ(ˇ¸ÅBˇËÅjˇËÅâˇÙlXÉΩ ùÉΩ8Äǡ‰ÄÑˇ‘8Ω8¿ÄBˇ‰HÄA8Ä¢ˇ‰ÄÖˇ‘ÄBˇ‰HÄAÄBˇÙKˇ¯•ÄA;càfl Ê,áAÊT©8/@˙,9 }!¶9_T9bˇ|8}*+}ã*A‚â`@0@˛ C‡ˇË|¶ T8})0}å0â`@@˛‡8Äǡ‰ÄÑˇ‘ÄBˇ‰Kˇ˝ôÄA;É8Ä¢ˇ‰ÄÖˇ‘ÄBˇ‰Kˇ˜≠ÄA®fl8,Ü@ÊDàˇP/^@˙88Åˇ‰Äàˇ‘ÄBˇ‰Kˇ˜ÄA;É8Å"ˇ‰Ä⡑ÄBˇ‰Kˇ˜ÄA©_8/ä@˛ÄâP,ã(@Êt8Åǡ‰Äåˇ‘ÄBˇ‰KˇˆµÄA®8/@˙àüP/Ñ)A˛àø,ÖAÊˇ»8Ĭˇ‰Äܡ‘ÄBˇ‰Kˇˆ—ÄA;É8Ä‚ˇ‰ÄᡑÄBˇ‰KˇˆÖÄA©8/@˙Ã8Å"ˇ‰Ä⡑8Ω8‹ÄBˇ‰Kˇ˝ÈÄA8ÅBˇ‰Ä䡑8ø\ÄBˇ‰HÄAÅ/ãA˛ÅüÄlˇ¸Äǡ¸Ä£ˇ|Ö AÊLKˇ¸©;C öìz(3{8bĬˇ‰Äܡ–8∫ÄBˇ‰HÄA8}8úÄ¢ÄBˇ‰HÄA8Ä‚ˇ‰Äᡑ8Ω0‹ÄBˇ‰Kˇ˜≈ÄA8Åˇ‰Äàˇ‘ÄBˇ‰Kˇˆ-ÄAC‡˝§ÄàÄ!|¶ªAˇËO‡ |¶øÅˇêî!ˇÄ;·8êA;¿;†ìø,ìø ìøìøÅ"ˇÙÅI\/
  14. A˙PÅbˇÙÉÀ\ ûÉfi ûÉfi/ûA˛0Åûˇ¸ÄbˇËÄɡËĨˇÙ|Ö @ÊÄfiˇ¸Ä‚ˇËÅˇËÅ&ˇÙi@;æ ùâ]4/
  15. A˙ ùÉù<C‡;Ä8 Åbˇ‰Äãˇÿ ùÄΩ8‹ÄBˇ‰KˇˆÄA8 Åǡ‰ÄåˇÿÄBˇ‰Kˇ˝—ÄAà  É/ÑA˛8ÄøÄ≈ˇ¸Ä‚ˇ¸Åˇ|à8AÊ 8 Å"ˇ‰ÄâˇÿÄBˇ‰KˇÙ=ÄAC‡ˇ¿â_ /
  16. A˙8}ÄBˇËHÄAC‡@8 Åbˇ‰ÄãˇÿÄBˇ‰KˇˆIÄA;É8}8úKˇÙ≈8}8úÄBˇËHÄAÄPÄ!|¶ªÅˇO‡ |¶ø¡ˇ¯êî!ˇ∏;·8êA;¿Äbˇ¸ÄBˇÃKˇ¯ÌÄA;√ û=Ä8lê~ê^ Äǡ‰ìƒÄÄ!|¶ª¡ˇ¯O‡ |¶ø°ˇÙêî!˛0;·8êA;¿;†ìøxìølìødìø\ìø(ìøìøìø Ä¢ˇÙÄ≈d ÜÄ‚ˇÙÅd àÅ( âÅFÅiäX@˛\ÅǡÙÄld ÉÄÉ ÑħÄ≈ˇ¸Ä‚ˇ¯Åˇ|à8@Ê0Å"ˇÙÉ…d ûÉfi ûÅ^Åjˇ¸Åǡ¯Äkˇc`Éfi8Äǡ‰ÄÑˇ‘ ûÄæ8¿ÄBˇ‰KˇıYÄA8Ä¢ˇ‰ÄÖˇ‘ÄBˇ‰KˇıAÄA®fl8/@˙º ûIJ| áÅ<ë(Å"ˇÙÉ©d ùÅ]Åjˇ¸ÅǡËÄlˇËÄãˇÙdÉΩ ùÉΩ8XÄ¢ˇ‰ÄÖˇÿ8Ω ùÄ›0ΔˇˇÄBˇ‰KˇÙUÄA8XÄ‚ˇ‰Äáˇÿ8øÑÄBˇ‰KˇıÂÄAâÑ/à!@˛(8} ùÅ=0⡡ ùÄΩÄBˇ‰HÄAĆÄ!|¶ª°ˇÙO‡ |¶ø·ˇ¸êî!ˇ∏;·8êA8êKˇ¯ê8ÅBˇËÄ䡉ÄBˇ‡HÄAÄÄ!|¶ª·ˇ¸O‡ |¶ø·ˇ¸êî!ˇò;·8êA=`ë=ÄÄëü<` @ê <Ä&@êü<†&@êø<¿ @êfl<‡Äêˇ=ë 88Ä    8† 8¿ÄBˇÿHÄAêb9 ë?=@ë_=`Äë =ÄÄëü<`Äê<ÄÄêü<†êø8¿êfl 88Ä    8† 8¿ÄBˇÿKˇÖÄAêb Ä8Ä!|¶ª·ˇ¸O‡ |¶ø·ˇ¸êî!ˇ¿;·8êA8bÄ‚ˇ‰ÄᡖÄBˇ‰HÄA9ëKˇ˛›ÄÄ!|¶ª·ˇ¸O‡ â,ˇ¸ˇÏElemDesc $ġ¯ˇË    FrameDescH\ptx|ä#ORSWǬÀÃ’Ó˙SW»Ã–’‹Ûı˝ˇî Ã⁄‹‡Á,JMOVXachm|~Éâã뢕ã¯Δ(8ShowKey
  17. ·{e
  18. ‰{f
  19. ‚{t
  20. „{v xy¯(8ShowPos„{begÂ{delta‰{end
  21. ·{f‚{pos¯Ø88GoBack·{pos¯· 8GetDsrbeg‰{dsr
  22. ·{f
  23. „{fnt
  24. p‚{pos¯º(8Handledsr
  25. ·{e
  26. ‰{e1     keysxy¯‚8New
  27. ·{e¯∏Ä8MarkProcs‹ch‰{key
  28. Â{mark„{pos
  29. ‚{t
  30. ·{v¯†»8ShowNext
  31. ·{f„{pos
  32. ‚{tf¯∏8Alloc
  33. ·{e¯Øò8UpdateÑch
  34. ·{f
  35. ‚{t¯ƒ8Insert¯ˇ08InitIcon¯ì8$$
  36. backE
  37. backFicon invIcon